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[57] ABSTRACT 

A method of matching a first query pattern with a plu- 
rality of stored data is disclosed. For each stored data 
pattern, the number of components are counted which 
are identical to corresponding components in the first 
query pattern, thereby forming a set of match numbers 
equals the number of components in any stored pattern, 
that stored data pattern is displayed as an output pattern 
set indicating a match. If no match exists then a second 
query pattern is determined by modifying the first query 
pattern, component by component, in dependence upon 
both a first, global influence of all stored patterns on all 
components of the first query pattern and a second, 
particular influence of all stored patterns on each re- 
spective component of the first query pattern. The first 
two method steps are then repeated using the second 
query pattern in place of the first query pattern. If no 
match a third query pattern similarly is determined by 
modifying the second query pattern. Finally, the output 
pattern is displayed, component by component, with 
those respective components of the third query pattern 
that have been modified at most once from the first 
query pattern. 

20 Claims, 3 Drawing Sheets 
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DYNAMIC PATTERN MATCHER USING 
INCOMPLETE DATA 

ORIGIN OF THE INVENTION 5 

The invention described herein was made in the per- 
formance of work under a NASA contract and is sub- 
ject to the provisions of Section 305 of the National 
Aeronautics and Space Act of 1958, Public Law 85-568 10 
(72 Stat. 435; 42 U.S.C. 2457). 

BACKGROUND OF THE INVENTION 
Field of the Invention 

This invention relates generally to pattern matching 
systems, and more particularly to a method for dynami- 
cally adapting the system to enhance the effectiveness 
of a pattern match. 

20 

State of the Art 

Apparatus and methods for calculating the similarity 
between patterns are known. For example, U.S. Pat. 

No. 3,727,183 to LeMay discloses a pattern recognition 
device using an image recognition algorithm capable of 25 
compensating for registration errors. A scanning wave- 
form is used to scan the input image. The scanning 
waveform is capable of being modified to minimize the 
degree of error. 

U.S. Pat. No. 4,446,531 to Tanaka teaches the use of 
a computer for calculating the similarity between pat- 
terns employing a pattern recognition technique using 
height or “weight” factors as measures of relative im- 
portance. 35 

U.S. Pat. No. Re. 26,104 to Glauberman et al dis- 
closes data processing apparatus utilizing a pattern rec- 
ognition method designed for analyzing character sym- 
bols. 

U.S. Pat. No. 4,319,221 to Sakoe shows a pattern 40 
recognition arrangement wherein a single input pattern 
feature vector is pattern matched with the reference 
pattern. 

There is considerable interest in the storage and re- ^ 
trieval of data, particularly, when the search is called or 
initiated by incomplete information. For many search 
algorithms, a query initiating a data search requires 
exact information, and the data file is searched for an 
exact match. Inability to find an exact match thus results 50 
in a failure of the system or method. 

It is therefore desirable to provide a method of stor- 
age and retrieval that shares some of the attributes of an 
artificial neural network (ANN), such as searching for a 
match using a query having only incomplete informa- 55 
tion, while avoiding some of the deficiencies such as 
long “learning” time and possible “retraining” when 
additional data is stored. In addition, it is desirable to 
provide several features not available in ANN systems, 
such as attaching relative importance as well as time 
dependence to stored data points. Thus, stored data may 
change in importance over time, whether the time de- 
pendent change is caused by the user, by outside input, 
or simply by a programmed degradation or appreciation 55 
over time. It is desirable that the stored data be allowed 
to change in this way without affecting the speed of 
retrieval or requiring additional training. 
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SUMMARY OF THE INVENTION 

It is an object of the present invention to find an exact 
match between a query pattern and one or more stored 
patterns, if an exact match exists. 

It is another object of the present invention to find the 
“best” match between a query pattern and a stored 
pattern; i.e., to find one or more stored patterns which 
are the closest to a match with the query pattern if no 
exact match exists. 

It is an additional object of the present invention to 
isolate a subset of the stored patterns for which a partial 
match is possible and to distinguish those portions of the 
stored patterns in the subset which match the query 
from those portions which do not match and are there- 
fore ambiguous. 

It is a further object of the present invention to allow 
the user to efficiently enhance the probability of a 
match by focusing on only the ambiguous portion of the 
stored and query patterns. 

It is a still further object of the present invention to 
allow the user to efficiently enhance the probability of a 
match by restating the query with additional data. 

It is a yet further object of the present invention to 
allow the user to efficiently enhance the probability of a 
match by storing more data. 

It is an even further object of the present invention to 
allow the user to efficiently enhance the probability of a 
match by modifying one or more of the stored patterns. 

The present invention incorporates procedures that 
seek a response which will be exact, if the query is an 
exact match to a positive stored data item of a given 
relative importance, or a “reasonable guess” in view of 
both the query and the stored data. The invention will 
return a stored item if the query is within a predeter- 
mined variance of a stored item, or the response may 
contain certain “ambiguous” components indicating 
that there is a conflict in the stored data that causes an 
inexact response to the particular query. The particular 
portions of the pattern which are ambiguous are indi- 
cated to the user. The invention, in this event, asks for 
instructions as to how the user wishes to proceed in 
effecting a match, as for example, changing the data in 
the query or changing one or more of the stored pat- 
terns. 

Many physical entities (photographs, electrocardio- 
grams, voice patterns, seismic signatures, written docu- 
ments, star patterns, fingerprints, eye fundus patterns, 
etc.) are capable of being represented by patterns of 
other physical entities (elements) in some format suit- 
able for electronic systems such as a sequence of digital 
electronic signals. As is well known, these patterns are 
capable of being stored in a computer memory to create 
a library of stored patterns. The present invention 
makes use of this capability as well as the ability to 
incorporate within each pattern a relative time-depend- 
ent importance property. 

Preferably, the query pattern comprising a set of 
elements representative of the entity to be matched is 
also created in the same format as the stored patterns. If 
not, it should be converted to this format prior to pat- 
tern matching. 

The aforementioned objects and advantages are 
achieved in accordance with the present invention, by 
the following method: 

The data to be stored and queried, as well as the 
query itself, is assumed to be in the form of binary lattice 
points ( 1 , 1 , 0,0, . . . , 0); that is, as points (also called 
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“patterns”) in a finite dimensional space having only 
zero or one as components. A positive integer n is used 
to indicate the length of such a point; i.e., the number of 
components or elements defining the point. The data 
and query are then stored in the n-dimensional space. 5 
For example, if the data points to be stored, as well as 
the queries, are of the form (0,0, 1,0) or (1,0, 1,0), then 
n = four. 

Let K denote the number of data points or patterns 
stored. For each data point B m , where m is an integer 10 
from 1 to K, we have 

*"=(*"1 b m n) 

which is point associated with the time t m . For each 
point B m we define an integer H(m, t m ) indicating the 
relative importance of the point with respect to the 
other points at the time t m . The function H(m,t m ) 
(which is the coefficient of a positive integer P, to be 
more fully explained later), may be allowed to incre- 
ment or decrement as the time parameter t varies from 
some initial time. In addition, for the point B m there is 
associated with the relative importance H(m,t m ) a direc- 
tion number C(m,t m ) indicating whether the point 
should be sought; i.e., whether it is attractive, (a posi- 
tive one); avoided or repelled (a negative one); or ig- 2 
nored (a zero). 

Generally, the method of the present invention in- 
volves a comparison of a query pattern with each of the 
stored patterns, on an element-by-element basis to de- 
termine the total number of elements which match, 30 
called the “degree of match”, for each stored pattern. A 
“complete match” is said to exist between the query and 
one or more of the stored patterns if the degree of 
match for any stored pattern or patterns is equal to (or 
within some predetermined variation from) the number 35 
of elements in the patterns. For some applications, lo- 
cating a complete match finishes the exercise. In other 
applications (for example, when H(m,t) is a much more 
significant factor that the degree of match) the pattern 
matching procedure continues. Of course, if C(m,t) is 40 
zero a complete match is not-significant. 

If no complete match is found by this first element- 
by-element comparison, a new or shifted query, called 
the “derived query,” is formulated from the original 
query. In formulating the derived query, use is made of 45 
the closeness of match, or degree of match, between the 
query of each of the stored patterns determined in the 
first comparison. In this way, the probability of a match 
between one or more of the stored patterns and the 
derived query is increased. 50 

The derived query is then compared on an element- 
by-element basis with each of the stored patterns in 
another attempt to find a match. The closeness of match 
of the derived query with each of the stored patterns is 
also determined and may be called the “second degree 55 
of match”. 

A complete match between the derived query and 
one or more of the stored patterns exists and is indicated 
if the second degree of match for any stored pattern is 
equal to the number of elements in the patterns. If a 60 
complete match is not found with the derived query 
pattern, a response pattern is created from the original 
query pattern and other information determined from 
the comparisons of the original and derived query pat- 
terns with the stored patterns. The response or “an- 65 
swer” pattern has as its elements both “determined” 
elements — i.e., those which are identical with corre- 
sponding elements of one (or more) or the set of closest 
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stored patterns — as well as “ambiguous” elements 
(those which are not identical). 

The representational format of the answer pattern 
may then be converted to a desired (usually the origi- 
nal) format (photograph, etc.) with the ambiguous ele- 
ments distinguished from the determined elements in 
some manner (e.g., lighter, darker, as + or — , etc.) 

Various manipulations may then be performed to 
enhance the probability of match, such as refining, en- 
hancing, supplementing, etc., the ambiguous portions of 
the query and repeating the above steps. 

The preferred embodiments of the present invention 
will now be described with reference to the accompa- 
nying drawings. 

BRIEF DESCRIPTION OF THE DRAWINGS 

FIG. 1 is a representational diagram of a two-dimen- 
sional figure (n = 2) having vertices at all binary points. 

FIG. 2 is a representational diagram of the two-di- 
mensional figure of FIG. 1 in which two stored points 
of prescribed height are placed perpendicular to the 
two-dimensional figure. 

FIG. 3 is a representational diagram identical to that 
of FIG. 2 in which a smooth surface S is formed over 
the set of points in three-dimensional space. 

FIG. 4 is a representational diagram similar to that of 
FIG. 3 showing the slope of the surface at a query point 
thereon in each of the two directions. 

FIG. 5 is a representational diagram showing two 
stored points placed on a two dimensional figure and 
illustrating a conflict in the stored data. 

FIG. 6 is a representational diagram similar to that of 
FIGS. 1-4 illustrating that the query point is “moved” 
to a new position. 

FIG. 7 is a process diagram showing the procedure 
for producing a response to an original query. 

DESCRIPTION OF THE PREFERRED 
EMBODIMENTS 

Conceptual Illustration 

As an illustration of the present invention, consider 
an n-dimensional cube with a direction and relative 
importance of C(m,t)P^ m ’') (see FIG. 1 for n=2). The 
relative importance of each stored point B m may be 
shown by placing a point in the n+1 dimension space 
perpendicular to the n-dimensional cube with direction 
and relative importance of C(rn,t)P // ( m >b. FIG. 2 illus- 
trates the case where n = 2; two points, B 1 and B 2 , are 
stored at (0,1) and (1,1) with relative importance magni- 
tudes of H(l,t) and H(2,t), respectively. The direction 
numbers C(l,t) and C(2,t) are both positive ones since 
relative importance H(l,t) and H(2,t) both are shown in 
the positive n + 1 direction. 

As an assist in conceptualizing, imagine a smooth 
surface S formed over the set of points in n+ 1 dimen- 
sional space. As shown in FIG. 3, this undulating sur- 
face rises at stored points with a positive C value, falls 
toward a zero height over non-stored points, and is 
negative at points that are to be avoided; i.e., points 
having a negative C value. This surface may change in 
time as the relative importance (magnitude of H) of 
stored data items (patterns) increment or decrement. It 
also, of course, changes as the sign of C changes. 

For purposes of this invention, significance lies not so 
much in the surface itself, but, rather, in the slope of the 
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surface in each of the n directions at a point of interest 
such as a query point. (See FIG. 4.) 

If a query point (pattern) is present, noting also that it 
is a binary point in the n-dimensioned cube, it is desired 
to determine toward which binary point in the cube it 
would need to move to effect a match. Assuming that 
“high” or relatively important points attract, relatively 
lower points attract less and negative points repulse, the 
tendency at the query point would be to move accord- 
ingly. Ambiguities may exist, as when the query is 
equally attracted to two or more binary points (or 
equally repulsed by two or more points). 

For example, in FIG. 5, assume that stored points 
(0,0) and (1,1) have the same relative importance, signi- 
fied by the same height perpendicular to the n-dimen- 
sioned cube. A query at point (1,0) would be equally 
attracted to both points, as would a query at point (0,1), 
thus a conflict or ambiguity is indicated. On the other 
hand, a query at point (1,1) would encounter no conflict 
and would be most strongly attracted to point (1,1) — i.e, 
no movement— because the slope of the surface S is 
zero in every direction. Likewise, a query at point (0,0) 
would have no tendency to move from that point. Of 
course, if the relative importance of (1,1) and (0,0) were 
significantly different, then the response to a query such 
as (1,0) would not be ambiguous, it would move toward 
the relatively more important point. The invention fa- 
cilitates dealing with ambiguities as will be explained in 
detail hereinbelow. 

As previously noted, the imaginary surface S is not 
significant; only its slope at points of interest (query 
points) is important in the decision process. Further, the 
magnitude of the slope is not necessarily significant for 
our purposes, only its algebraic sign. If the sign of the 
slope in the \ th direction is positive, then the point 
should “move” in the \ th direction, while if the sign is 
negative, the query point should “move” in the negative 
\ th direction. When the slope in the \ th direction is zero, 
there is no “movement” in the \ th direction. 

The method according to the present invention pro- 
ceeds as follows: The slopes in each of n directions on 
the surface are determined for the query point and the 
values stored. A new or “shifted” query point (not 
necessarily a binary point) is determined from the origi- 
nal query in a manner to be described below, and it is 
then applied to the n-dimensioned cube. The slopes in 
each of the n directions on the surface at the new posi- 
tion (the second slopes) are determined and the values 
noted and stored, completing the numerical computa- 
tions. (See FIG. 6.) It should be noted that no more than 
two iterations are required to determine the response. 
The information gained from the computations can be 
analyzed for a response to the original query. 

The sign of the slope in each direction at the original 
query point is noted; thereafter, the sign of the slope in 
each direction at the shifted query point is noted. 

The response point or answer pattern is formed from 
the original query point and the slopes of the original 
and shifted query points as follows: 

If the i th component or element of the query point is 
0 and both the first slope and the second slope in the \ th 

direction are positive, then the \ th element of the re- 
sponse is 1. 

If the \ th element of the query point is 1 and both 
slopes in the \ th direction are negative, the \ lh element of 
the response is 0. 
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If the \ th element of the query point is 0 and the first 
slope in the \ th direction is negative, then the \ th element 
of the response is 0. 

If the \ th element of the query point is 1 and the first 
5 slope in the \ th direction is positive, then the \ th element 
of the response is 1. 

If the \ th element of the query point is 0, the first slope 
in the \ th direction is positive and the second slope in the 
\ th is negative, then the \ th element of the response is 
10 ambiguous (denoted herein by the symbol *). 

If the \ th element of the query point is 1, the first slope 
in the indirection is negative and the second slope in the 
\ th direction is positive, then the \ th element of the re- 
sponse is ambiguous; i.e., *. 

15 Thus the response is of the form (0,0, 1,1,1, . . . ,1,0,1) 
for a definitive response or complete match, or the 
response is of the form (0,0,1,*,1 . . . ,*,0,1) when some 
of the elements are ambiguous; i.e., the response is par- 
tially ambiguous. A complete match is said to exist if the 
20 degree of match is equal to the number of elements in 
the patterns. In the case of a partially ambiguous re- 
sponse, there are several options or combination of 
options available to the user. One, obviously, is to re- 
phrase the query or use another query. Another is to 
25 store more data in the stored patterns, and yet another 
is to modify some of the stored data. 

It should be noted that the stored points, each of 
which has a time dependent relative importance prop- 
erty, can decrement over time to a near zero value, or 
30 become negative or positive or zero, thus allowing a 
stored point to more strongly attract (or repulse) or 
ignore. While the relative importance property of a 
point can be increased or decreased at any time, or 
allowed to remain constant, none of these changes re- 
35 quire any “retraining time”. This particular feature is 
not found in artificial neural systems. 

FIRST EXAMPLE 

The following example of this method was installed 
40 and operated in a Symbolic computer using a LISP 
program as set forth in the attached Appendix. It should 
be pointed out that both the “zero” and “one” elements 
of a point were considered to be of equal significance. 
Using the previously stated concepts, a pattern match 
45 was attempted between a query pattern and a library of 
stored patterns to determine a response or answer pat- 
tern using the following algorithm: 

(1) Suppose that n is the maximum length of a point to 
be stored. 

50 (2) Each of B 1 , B 2 , . . . , B* is a data point to be stored 

of relative importance H(l,ti), . . . , H(k,t*) and sign 
C(l,ti), . . . , C(k,t*) respectively. 

(3) Let P denote a positive prime number (for mod P 
calculations) and each of L and L' an integer 

55 (L>L'> 1). 

(4) Let X=(xj, . . . , x n ) be a query point. 

(5) We first compute and store, for each integer i from 
1 to n, the value of the Di,/ (see below), which is 
proportional to the slope in the \ th direction at the 

60 query point X=(xj, . . . , x n ), 

DU[t]: X:B\ . . . ,£*) « C(U) [pW.D] S\(X,i) + 

C(2,0 P^ 2 ’ 0 [P w ’ 2) ] S 2 (X,i) + 

65 a 3,0 [pi-TO>] StfX.i) + . . . + 

QM P«M [/*-***>] 
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where 

(1) C(m,t) is the sign (or 0) of the stored point B m 
at time t (if 0, C is then ignored in computations), 

(2) H(m,t) is the height of the stored point B m at 

time t, 5 

(3) J(X,j) is the number of components of B that 
agree with the corresponding component of X, 
i.e., a measure of closeness and 

(4) S/X,i) is — 1 if the \ th component of Bi agrees 

with the \ th component of X and is 0; 10 

1 if the \ th component of B / agrees with the \ th com- 
ponent of X and is 1 ; 

— P 3 if the \ th component of X is 1 and the \ th com- 
ponent of B / is 0; and 

P 3 if the \ th component of X is 0 and the \ lh compo- I 5 
nent of B/'is 1. 

P can be any prime number. In the preferred embodi- 
ment, P=2. 

(6) A new point X' is formed from the query point X 
and the signs of the numbers Dj,i ([t] : X : B 1 , . . . 20 
, B*), . . . , Di „([t] : X : B 1 , . . . , B*) in the following 
manner: 

If the \ th component of the query point is 0 and Di 
<[t]:X:B!, . . . , B*) is positive, then the i lh compo- 
nent of X' is 1; 25 

If the \ th component of the query point is 1 and Di 
/([tJrXiB 1 , . . . , B*) is negative, then the i th compo- 
nent of X' is 0; and 

If the \ th component of the query point is 0 and D 
X[t]:X:Bl, . . . , B*) is zero, then the \ lh component 30 
of X' is the \ th component of X. 

(7) For each integer i from 1 to n, we compute and 

store the value of the D 2 ,/ (see below), which is 
proportional to the slope in the \ th direction at the 
shifted point X'=(x'i, . . . , x'„). 35 

DlM- X:B ] B*) = C(l,f) PWI-O [pL'JVrjy\ Si(X,i) + . . . + 

C(kt) pmQ [pL'J()T,k)} Sk<JC ' j) 

40 

where 

(1) C(m,t) is the sign (or 0) of the stored point B m 
at time t; 

(2) H(i,t) is the height of the stored point B' at time 

t; 45 

(3) J(X',J) is the number of components of B / that 
agree with the corresponding component of X'; 
and 

(4) S/X',i) is — 1 if the \ th component of BI agrees 

with the \ th component of X' and is 0; 50 

1 if the \ th component of Bl agrees with the \ th compo- 
nent of X' and is 1; 

— P 3 if the \ th component of X' is 1 and the \ th com- 
ponent of Bi is 0; and 

P 3 if the \ th component of X' is 0 and the \ th compo- 55 
nent of B/is 1. 

At this point the response to the original query is 
made in the following manner (see FIG. 7): 

(8) The value of the slope in each direction at the 
original query point X has been stored and the 60 
value of the slope in each direction at the shifted 
point X' has been stored. 

If the \ th component of the query point is 0 and both 
the slope of the query point X and the slope of the 
shifted point X' in the \ lh direction is positive, then the 65 
\ th component of the response is 1. 

If the \ th component of the query point is 1 and both 
the slope of the query point X and the slope of the 
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shifted point X' in the \ th direction is negative, then the 
\ th component of the response is 0. 

If the \ th component of the query point is 0 and the 
first slope in the i th direction is negative, then the \ th 
component of the response is 0. 

If the \ th component of the query point is 1 and the 
first slope in the \ lh direction is positive, then the \ lh 
component of the response is 1. 

If the \ th component of the query point is 0, the slope 
of the query point X in the \ th direction is positive and 
the slope of the shifted point X' in the i th direction is 
negative, then the \ th component of the response is *; i.e., 
it is uncertain. 

If the \ th component of the query point is 1, the slope 
of the query point X in the i th direction is negative and 
the slope of the shifted point X' in the \ th direction is 
positive, then the \ th component of the response is *; i.e., 
it is uncertain. This process is shown in FIG. 7. 

If there is uncertainty in the response, then the afore- 
mentioned options come into play. The machine may be 
queried by the user with a different query, additional 
data may be added and a query made, or one or more of 
the items stored may be modified and a query made. In 
any event, a query may be made immediately, as there is 
no “training time” required. 

If there is no uncertainty, then stored data may be 
modified and another query made. 

SECOND EXAMPLE 

In the case described in FIGS. 2 , 3 and 4 , the dimen- 
sion is two (n = 2) P = 2, L = 5 and L' = 3 and for simplic- 
ity we set t = ti — t 2 =0. The points B!=(0,1) and 
B 2 =(l,l) are stored at relative importance H(l,0)=7 
and H(2,0) = 5 with C(1,0)=1 and C(2,0)=l. The 
query point is X = (0,0). 

For this case: 

XX, i) = 1, 

XX, 2) = 0, 

S\(X,\) = -1, 
and S 2 (X,\) = 2 3 . 

We now have: 

D U (0:X:B\B 2 ) = 0(1,0) 2** 1 ’ 0 ) 2^X1) Sl (XJ) -f 

C(2,0) 2*< 2 ’°> 2^X2) 5 2 (X7) = 1 X 2 7 X 2 5 * 1 (-1) + 

1 X 2 5 X 2 5x0 X 2 3 = -2 12 + 2 8 < 0. 
DniaXBKB 2 ) = 0 ( 1 , 0 ) 2 * 0 . 0 ) 2 ^(X1) Si(X.Z) + 

0(2,0) 2*< 2 >°) 2*-W) Si(X,2) - 1 X 2 7 X 2 5xl X 2 3 + 

1 X 2 5 X 2 5x0 X 2 3 = 2 15 + 2 8 < 0. 

Because Di i(0:X:Bi, B 2 )<0 and Di t2 (O:X:Bi,B 2 )>0 
the energy point X=(0,0) is “moved” to a new point 
X'=(0,1). Also since the first component of X is 0 and 
Di,i is less than zero it follows that the response in the 
first component is 0, and there is no need to compute 
D 2 ,i. 

We now compute £>22(0:X , :B\B 2 ) = 

0(1,0) 2*0,°) 2 l ‘XX .1) Si(JT,2) + 0(2,0) 2*^ 2 - 0 ) 2 L ‘XX D s 2 (X, 2) = 

1 X 2 7 X 2 3x2 X 1 -I- 1 X 2 5x1 X 2 3x1 X 1 > 0. 

Because Dj 2 and D 2 2 are both positive and the sec- 
ond component of the query point X is 0, it follows that 
the second component of the response is 1; thus we find 
the response to the query X = (0,0) is (0,1). 
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The algorithms indicated for the method according 
to the invention are intended to be implemented on a 
multiprocessor machine as there is a considerable 
amount of parallelism. 

The pattern matching method according to the pre- 5 
ferred embodiment of the present invention is summa- 
rized in the following Table: 
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query pattern, component by component, in depen- 
dence upon both a first, global influence of all 
stored patterns on all components of the first query 
pattern and a second, particular influence of all 
stored patterns on each respective component of 
said first query pattern (steps (5) a: (12) in the Ta- 
ble). 


TABLE 


Step No. 

Step Name 

Operation 

Subscripts 

(1) 

Store Patterns 

B = b u . 

i — 1, , n 

j = 1 k 

(2) 

Define Query 

X = x/. 

i = 1 n 

(3) 

Match Set 

M = my 

j = 1 k 

(4) 

Initial Output 

Oj - o ij = Xjj, 

where m ; — n 

i = 1, ...» n 

j = 1 k 

(5) 

Disturbance 

LM = Lmy 

Where 2 ^ L = 20 
3 ^ L ^ 7 

i = I, .... k 

Max. Range, 
Best range. 

(5A) 

Disturbance 
with Height 

LM + H(t) = Lmy + hy 

j = 1 k 

(6) 

Sign 

Sgn = sgn/y = 2 b/y - 1. 

i = 1, . . . , n 

j « 1 k 

(6A) 

Sign with 
Direction 

C(t) Sgn = Cy sgn/y = Cy (2 b/y 

Where cy = + 1, — 1 or 0. 

- 1). i = 1, n 

j = 1 k 

<7) 

Magnitude 

Mag = mag /y = [(logxor (b/y, x/) - 
Where 2 ^ N ^ 20 
3SNI7 

1)N:1]. 

Max. range, 
Best range, 
i = I, . . . , n 

j = L k 

(8) 

Exponent 

Exp = exp ,y = Lmy + mag /y. 

i = 1, . . . , n 
j = 1 k 

(9) 

Positive/ 

For each i — 1, .... n form two sums: 


Negative Sums 

Pos. sum / = P(exp/y) + . . . + P(exp,;*) for each (exp,;*) of j 
where sgn/y > 0, 

Neg. sum/ = P(exp/,i) + . . . + P(exp/,*) for each (exp/,*) of j 
where sgn/y < 0. 


00) 

Second Query 

Form intermediate set D = d/ 

If Pos. sum/ = Neg. sum,, then d/ = 1; 

Else d / = 0. 

Form X' = x/ = d/. i = 1, . 

. . , n 

(H) 

Intermediate 

Response 

R = r/ i = 1, . 

Where r/ = x/, if d/ = x/ f and 
r/ = set flag, if d, = x/. 

. . , n 

(12) 

Initialize 

Set X = X', X' = x/, i = 1, . 

Set L s= L\ where L' < L; 

. . , n 

(13) 

Recompute Go through steps (3)-{9) forming a 

new intermediate set D = d, 

Computations are required only for 
those components i that had “set flag". 

i i 


(14) 

Third Query 

For those components that had “set flag"; 
if d/ = x/\ then x/" = x,\ and 
if d / — x/\ then x/" — *. 


05) 

Output ‘ 

II 

K 

II 

>< 

II 

o 

. . , n 


(d) Steps (a) and (b) are then repeated using the sec- 
ond query pattern in place of the first query pat- 
tern. 

(e) If no match number my— n, a third query pattern 
X"=x/' is determined by modifying the second 
query pattern, component by component, in depen- 
dence upon both a third, global influence of all 
stored patterns on all components of the second 
query pattern and a fourth, particular influence of 
all stored patterns on each respective component of 
the second query pattern, with the third and fourth 
influences being less than the first and second influ- 
ences, respectively (steps (13 and (14) in the Table). 

(0 The output pattern 0 = 0 /, is then displayed, com- 
ponent by component, with those respective com- 
ponents of the third query pattern that have been 
modified at most once from the first query pattern 
(step (15) in the Table). 


In the pattern matching method set forth in this table 50 
a first query pattern, taking the form of a set X=x/, is 
matched with a plurality of stored data patterns, taking 
the form of a matrix B=b,y, where i=i, . . . , n is the 
number of components in each pattern and j =j, . . . , k 
is the number of stored patterns. As may be understood 55 
from this table, the method comprises the following 
essential steps: 

(a) For each stored data pattern, the number of com- 
ponents which are identical to corresponding com- 
ponents in said first query pattern are counted, 60 
thereby forming a set of match numbers M=my, 
(steps (l)-(3) in the Table). 

(b) If any match number my= n, then the respective 
j'* stored data pattern is displayed as an output 
pattern set Oy— o,y indicating a match (step (4) in the 65 
Table). 

(c) If no match number m y — n, then a second query 
pattern X'=x/ is determined by modifying the first 
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If desired, those respective components that have 
been modified twice from the first query pattern may be 
displayed in the output pattern 0=o,in such a manner 
as to indicate conflict between the first query pattern 
and the set of all stored data patterns. For example, 5 
these components that have been modified twice may 
be displayed as an asterisk (*). 

The step (c) indicated above preferably comprises the 
steps of: 

(1) multiplying each match number my of a match set 10 
M by a first disturbance factor L to produce a set 
LM; 

(2) determining a sign matrix Sgn for all components 
sgn,y by setting each component equal to — 1 if the 
corresponding stored pattern component by is 0, I 5 
and to + 1 if the stored pattern component is 1; 

(3) determining a magnitude matrix Mag for all com- 
ponents according to the formula mag,y= [(logxor 
(by, x/) = 1) N:l], where N is a magnification factor; 

(4) determining an exponent matrix Exp — LM + Mag 20 
for all components according to the formula ex- 

py — Lmy+ magy- 

(5) forming the positive and negative sums for all 
components as follows: 

Pos.sum,— P(exp, t i) + . . . 4- P(exp /,*) for each 25 
(exp/,*) of j where sgn/y>0, 

Neg.sum,— P(exp/,i) + . . . + P(exp/,*) for each 
(exp/,*) of j where sgn,y<0 and 

(6) determining a second query pattern set X'=x/ for 

all i as follows: 30 

if Pos. sum/^Neg. sum,, then x/ = l, 

else x,*' =0. 

Thereafter, a response set R = r/is determined for all 
i as follows: 

35 


rj=x> if Xj'—Xj, and 


r;= set flag, if x/=Xj. 


Similarly, step (e) indicated above preferably includes 
the steps (1) through (6) using a second disturbance 
factor L' which is less than the first disturbance factor L 
for those components i that have a set flag. 

According to a preferred embodiment of the present 45 
invention, the height factor set H = hyis associated with 
the components of each stored pattern by, each height 
factor component hy being indicative of the relative 
importance of each stored pattern with respect to the 
other stored patterns. This height factor set H is added 50 
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to the set LM for purposes of determining the matrix 
Exp. 

The height factor components hymay be a function of 
time and are also preferably an integer, such as — 1, 0, 1, 
2, etc. 

According to a further preferred embodiment of the 
present invention a sign factor set C—c j is associated 
with the components of each stored pattern by. Each 
sign factor component cy is indicative of whether the 
pattern component is to be sought, avoided or ignored. 
The sign factor set C is multiplied by the sign matrix 
Sgn for the purposes of determining the positive and 
negative sums. 

Some or all of the sign factor components cymay be a 
function of time. These sign factor components cy are 
preferably the integer values +1,0 and — 1. 

The maximum range for the first disturbance factor L 
is approximately 2 to 20; the best range for this factor L 
is 3 to 7. For example, the first disturbance factor L may 
be chosen to be 3 while the second disturbance factor L' 
is chosen to be 2. 

The maximum range for the magnification factor N is 
2 to 20 with the best range of values 3 to 7. For example, 
the magnification factor may be chosen as 3. 

In conclusion, the method of matching a first query 
pattern, represented by the set X, with a plurality of 
stored data patterns, represented by the matrix B, is 
accomplished by approximating the surface in vector 
space defined by the stored patterns by a Bernstein 
Polynomial. This approximation makes it possible to 
compute the derivative of the surface in all directions at 
the query, point. It is thus possible to determine a new 
query point by proceeding in the direction of positive 
slope (derivative) and in the opposite direction of a 
negative slope (derivative). 

A preferred embodiment and best mode of a LIST 
computer program which implements the present in- 
vention is set forth in the attached Appendix. 

There has thus been shown and described a novel 
dynamic pattern matcher which fulfills all the objects 
and advantages sought therefor. Many changes, modifi- 
cations, variations and other uses and applications of the 
subject invention will, however, become apparent to 
those skilled in the art after considering this specifica- 
tion and the accompanying drawings which disclose the 
preferred embodiments thereof. All such changes, mod- 
ifications, variations and other uses and applications 
which do not depart from the spirit and scope of the 
invention are deemed to be covered by the invention, 
which is to be limited only by the claims which follow. 


APPENDIX 


... Mod* : LISP; Syntax: Common-lisp; Package: USLR; Base 1C 

; (defmacrc flip (x) 

; Mccnd (<- .x 0) 1) 

; (t 0))) 

(def flavor box-mouse-ser.si tive-items-mixin 
((item-list nil) 

(sensitive-item nil) 

(item-blinker) ) 

O 

(srequired-flavors tv: sheet) 

(: settable-instance-variables item-list) ) 

(defs truer (item) 
left 
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top 
right 
bottom 
( SC AtC 0) 
nine} 

(defmethod (bcx-mcuse-ser.sitive-items-mixin :*ft«r :init) (ignore) 

(setq item-blinker 

(tv:make-b linker self ' tvshollow-reet angular-blinker xvisibility nil})} 

(defmethod (box-mouse-aensitive-items-mixin : find-items) (rc-Iist) 

(loop for item in item-list 
nconc 

(end (member (item-name item) re-list : test ♦' equal) 

(list item))}) 

(defmethod (box-mouse-sensi tive-items-mixin xmake-item) 

(name left top right bottom) 

(let ({item (make-item xleft left 
stop top 
: right right 
s bottom bottom 
xname name))) 

(push item item-list) 

{ tv : mouse-wakeup ) 
item) } 

(defmethod (bex-mouse-sensitive- i tems-mixin :print-item-content) 

({optional (stream *terminal-io* ) ) 

(loop for item in item-list 

for left - (item-left item) 
for top - (item-top item) 
for right - (item-right item) 
for bottom - (item-bottom item) 
for state • (item-state item) 
for name - (item-name item) 
do 

(format stream "-%name - -0 left - -0 top - -D right - -D bottom - ~D state - -0* 
name left top right bottom state) ) ) 

(defmethod (box-mouse-sensi live-items -mixin :remove-item) (item) 

(setq item-list (delq item item-list}) 

( tv : mouse-makeup) ) 

(defmethod (bc*-mous«-s«nsitive-items;-mixin : remove-all) () 

(setq item-list nil) 

(tv: mouse -vakeup) ) 

(defmethod (box-mouse-sensi tive-items-mixin :reset-state) () 

(loop for item in item-list 
do 

( set f (item-state item) 0))) 

:: Hote this function uses the current item-list order and to generate a linear bit vector 
item-list order cannot be alter!!!! _ 

(defmethod (bex-mouse-sensi tive-items-mixin r make-item-state-array) () 

(let* ((1 (length item-list)) 

(stata-array (make-array 1 : element-type '(unsigned-byte 1)))) 

(declare (sys : array-register state-array)) 

(loop for item in item-list 

for index downfrom (1- 1) 
do 

(self (bit state-array index) (item-state item))) 
state-array) ) 

; (defun foo (row-index eol-index 1st dir) 

; (let* ((max-row-index 4) 

; (max-col-index 4) 

; (no-rows <!♦ max-row-index) ) 

; (no-cols (l* max -col- index) ) ) 

; (loop for c from 0 to max-row-index 
; collect 

: (loop for r from 0 to max-col -inde.*: 

; collect 

.* (case dir 

: ( : row (nth («• (* c no-rows) r) 1st)) 

; (:col (nth (♦ c (* r no-cols)) 1st))))))) 

; {defun test (no-rows no-cols 1st dir) 

; (loop for c from 0 below no-rows 
; collect 

; (loop for r from 0 below no-ccls 

: collect 

: (case dir 

; - ( : row (nth (+ (* c no-rows) r) 1st)} 

: < :col (nth {♦ c (* r no-cois) ) 1st)}}})} 

; (defun bar (1st) 

; (let { (11 (length (car 1st) ) } } 

: (loop for i in 1st 
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nconc 

{loop for k from 0 below (1- 11) by 2 
collect 

(let ({counter 0)) 

(if (dotimes (c 3 (if counter 2).t nil)) 

(end (- (nth <♦ c k) i) 1) (incf counter))) 

1 

0 )))))) 

(defur. xx (item-list ne-rows no-cola ^optional (type :row)> 

(let ((ril (reverse item-list)) 

outer-loop-count inner-loop-count) 

(cue type 

Crow (setq outer-loop-count no-rows) 

(setq inner-loop-count no-cols)) 

(:col (setq outer-loop-count no-ccls) 

(setq inner-loop-count no-tows))) 

(loop for c froa 0 below outer-loop-count 
collect 

(loop for r from 0 below inner-loop-count 
collect 

(nth (esse type 

(:col {- (• r outer-loop-count) c) ) 

(:row {- {* c outer-loop-count) r) ) ) ril) 

;; (item-state (nth <- (* c outer-loop-count) r) rill) 

)))) 

(defun-method get-list bex-aouse-sensitiva-items-tnixin (no-rows no-cols toptional (type :rowj) 
(let ((ril (reverse item-list)) 

outer-loop-count inner-loep-count ) 

(e*»« type 

Crow (setq outer-loop-count no-rows) 

(setq inner-loop-count nc-cols) ) 

(: col (setq outer-loop-count no-cols) 

(setq inner-loop-count no-rows))) 

(loop for c from 0 below outer-loop-count 
collect 

(loop for r fro* 0 below inner-loop-count 
collect 

(item- state (nth (case type 

( : col <♦ {* r outer-loop-count) c) ) 

Crow (- (* c outer-loop-count) r))) ril)) 

)))) 

(defun-method compress-rule box-mouse-sensitiv«-items-mixin (1st) 

(let ((11 (length (car 1st)))) 

(loop for i in 1st 
nconc 

(loop for k from 0 below (l- H) by 2 
collect 

(let ((counter 0)) 

(if (dotimes (c 3 (if (£ counter 2 ) t nil)) 

(end (- (nth {- c k) i) 1) (incf counter))) 

1 

0 ) )) ) )) 

(defun aake-col-list (list no-rows no-co) s) - . 

(loop for c fro® 0 below no-rows 
collect 

(loop for r fro® 0 below no-cols 
collect 

(nth (♦ c (• r no-rows)) list)))) 

(defun make-rc-list (list no-rows no-cols «key (type :ccl)) 

(let (outer-loop-count inner-loop-count) 

(cese type 

<:row (setq outer-loop-count no-rows) 

(setq inner-loop-count no-cols)) 

(:col (setq outer-loop-count no-cels) 

(setq inner-loop-count no-rows))) 

(loop for c from C below outer-loop-count 
collect 

(loop for r fro® 0 below inner-loop-count 
collect 

(nth (cese type 

(:eol (♦ (* r outer-loop-count) cl) 

Crow (+ (* c outer-loop-count) r)» ) list))))) 

(defmethod (box-mouse- sensit ive-items-»ixin : compress) (type) 

(let* ((sire (item-name (car item-list))) 

(no-rows (!♦ (car sixe))} 

(no-cols (1-* (edr sixe) ) ) 

(compress-rows (1* (floor (/ ae-rovs J)))) 

(compress-cols <!♦ (floor {/ no-cols 3)))) 

(compress-rc-vector (make-erray <* compress-rows compress-cols) 

: element -type * (unsigned-byte 1))) 
compress-list outer-loop-count inner-loop-count) 

(declare (special comress-rc-vector) ) 

(print (make-re-list 

(compress-rule (get-list no-rows no-cols ; col ) ) 
congress-rows no-cols : type :row) ) 
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(setq compress-list 

(if <eq type :ccl) 

(print (compress -rule (make-rc-list 

(compress -rule (get-list no-row* no-col* :r©w)) 
no-row* compr**»-col* :type :coU>) 

:: the following code is wrong 
(print (compress-rule (make-rc-liac 

(compress-rule (g*t-liat no-row* no-cola :col) ) 
compress-row* no-cola :typ* :rew)))) ) 

(ease type 

{; row (setq outer-loop-count compress -row a) 

(setq inner-loop-count compress-eel*)) 

(scol (setq outer-loop-count compress -col*} 

(setq inner-loop-count compresa-row*) } } 

(loop for c from C below ©uter-loop-count 
do 

(loop for r from C below inner- loop-count 
do 

(aetf (bit compreaa-rc-wector (ease type 

(:col (* c (* r out a r- loop-count} }} 
(:r©w (♦ r t* c outer-loop-count})))) 

(pep compreaa-iiat) } ) ) 
compre*»-rc-voetor) ) 


(eefwhcpper (box-mouse-aensitive-items-mixin : handle-mouse) () _ 

(unwind-protect 

( cent inuerwhoppe r } 

(setq sensitive-item nil) 

(send item-blinker :set-visibility nil})) 

(defaethod (box-mouae-senait iv«-items-mixin : vho-line-documentaticn-string) (} 

(xl : string 

"2.: Toggle Bit, X.-2:Clear Pad Grid M (Hold) : Draw, R (Hold) :£raa«. Ctl-L:Sav«, Het*-L:Run Super-L: Run HN 

•) ) 

; (when sensitive-item (item-documentation sensitive-item) ) ) 

(defmethod <box-mou»e-aena it ive-itema-mixir. : mouae-sena i t iv*-item) (x y) 

(deef x (send self : left-margin-sixe ) ) 

(deef y (send self : top-margin-si xe) ) 

(setq sensitive-item 

(delist (item item-list) 

(when (end (2 y (item-top item) } 

(< y (item-bottom item) ) 

(£ x (item-left item)) 

(< x (item-right item))) 

(return item) } ) ) ) 

(defmetbod (box-mouse-sensitive-items-mixin :*cu*#-mov«s ) (x y) 

(tv:mouse-aet-blink*r-eurserpos) 

;; See if the mouse is inside an item 

(let ((item (send self :mcu*e-sensitive-item x y)}) 

(cond (;; It is, turn on the blinker 
(net (null item) ) 

(let ((left (item-left item)) 

(top (item-top item) ) 

(right (item-right item) ) 

(bottom (item-bottom item))) 

(send item-blinker : set -curs orpes left top) 

(aend item-blinker rset-sixe (- right left) (- bottom top)) 

(send item-blinker : aet-viaibility t) ) ) 

: : It's not on an item, turn off the blinker. 

(t (aend item-blinker : set-visibility nil))))) 

; (dafrwrthod (bex-meuse-sensi tive-items-mixin :mouae-cliek) (button x y) 

; (let ((item (send self :mou*e-sensitive-item x y))))J 


(def flavor sens! tive-pad-mixin ({row nil) (col* nil)) 

O 

(: required -flavor* box-mouse-sensitive-items-mixin tv:graphics-sixin tvrwindow) 

: settable-instance-variabies) 

(d* f net hod ( a«naitiv*-pad-mixin :*ake-aensitiv«-araa) 

(pad-width pad-height) 

:: Th« order of the loop is extremely important!! 

:: It determines the scanning of the grid from left to 
; ; right and top to bottom ia how is done now.. 

(sand self :remeve-*ll) 

(loop for r from 0 below row 

for top from 0 by pad-height 
do 

(loop for c from 0 below col 

for left from 0 by pad-width 
do 

(send self :m*ke-item (cons r c) left top (* left pad-width) (♦ top pad-height} ))) ) 

(dafmathod (sensitive-pad-mixin :draw-qrid) 

U optional (make-sensitive-areas t) 
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(erase-content t) 
iaux pac-width pad-height grid-width grid-height) 

(when erase-content 
(send self : expos* ) 

(sand seif ;ci«*r-windowj ) 

Owl tiple-velue -bind (width height) (send self : inside-sixe) 

(setg pad-width (floor (/ width col))) 

( aa t g pad-height (floor (/ height row) ) ) 

(setg grid-width <* col pad-width)) 

(setg grid-height (* row pad-height) ) 

(loop for c from 0 to row 

for y from 0 by pad-haight 
do 

(if (2 y height) (dacf y) ) 

(sand self :drew-line 0 y grid-width y tv;*lu-s«ta) ) 

(loop for r from 0 to col 

for x from 0 by pad-width 
do 

(if (£ x width) (dacf x) > 

(sand sal f :draw-line x 0 x grid-height tv:alu-seta) ) 

(if mak«- sensitive-area a 

(send self smake-sensitive-area pad-width pad-height)))) 

(da fun draw-pattern (row col pattern-array window .optional (sire nil) (from-x 0) (from-y 0) 
taux box-width box-height alu (draw-half nil) (dire -1) 

(p pattern-array) ) 

(declare (sys :array-register p) ) 

(suit iple-value— bind (width height) (if (null sire) (send window : inside-sire) 

(apply ♦ 'values sixe]) 

(setg box-width (floor (/ width col))) 

(setg box-height (floor (/ height row))) 

(loop for c from 1 to row 

for top from £rom-y by box-height 
do 

(loop for r from 1 to col 

for left from from-x by box-width 
do 

(case (bit p (incf dim) ) 

({1 t) (setg alu tv:alu-seta) ) 

((0 nil) (setg alu tv;alu-andca) ) 

(* (setg draw-half t) ) ) 

(if (not draw-half) 

(send window : draw- rectangle box-width box-height (1-*- left) (1+ top) alu) 

(aend window : draw-rectangle 
(floor (/ box-width 2) ) 

(floor (/ box-height 2) ) 

(- left (floor (/ box-width 4))) 

(- top (floor (/ box-height A))) 
tv: alu-seta) 

(setg draw-half nil)))))) 

r.Msecg fee (tv:na.ke-vindov 'tv:window :edges-from rmouse :blinker-p nil)) 

(de f flavor st cred-pattems-pane (input-pattem-stream state-list garys-state-list height-list) 
(box-mouse-sensitive-ltems-sdxin sensitive-pad-mixin 
tv: graphics -mixin tv :pane-mixin tvrwindow) 

: sa c table-instance- variables) 

(defmethod (stcrad-patterns-pane :who-line-documentation-string) () 

(xl : string -L-2:Delete, Ctl-L: Modi f y ') ) 

(defmethod (storad-patterns-pane :divide-storage-boxes) (s-row s-col) 

(send self :set-row s-row) 

(sand self :set-col a-col) 

(send self :draw-grid t)) 

(defmethod (stored-patterns-pane :updace-atate-and-height-list) () 

(aetg state-list nil) 

(setg garys-state-list nil) 

(setg height-list nil) 

(loop for i in item-list 

for state - (Item-state i) 
for h - (item-name i) 
do 

(when (typep state 'array) 

(setg state-list (eons state state-list)) 

(setg height-list (cons h height-list)))) 

(»atg garys-state-list (mapear 'convert-to-one state-list))) 


(de fun-method edit-pattern stcred-patteras-pane (item-state window) 
(let {(item-array item-state) 

(ip-items (reverse (send window : item-list l )) ) 

(declare (sys : array-register item-array)) 

(send window : reset-state) 

(send window :clear-window) 

(send window :draw-grid nil) - 

(loop for i ir. ip-items 
for index from 0 
do 

(if (- (bit item-array index) 1) 

(send window :update-item i :draw))))) 
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(dafmathod (sterad-pattarns-pana :mousa-click) (button x yl 
(lat ((itam (send aalf imeusa-aansitiva-itam x y) 1 
(ip (sand Ml f rinput-pattam-straam) 1 ) 

(ccnd (<aql button f \c-mcusa-l.-l) 

(adit-pattarn (Itam-stata itan) ip) 
t) 

( (aql button #\mousa-L-2) 

(lat (<laft (itam-laft itam)) 

(top (itam-top itam)) 

(right (itam-right itam) } 

(bottom (itam-bottom itam})) 

(aatf (itam-stata itam) 0) 

(aatf (itam-nama itam) 0) 

(sand aal£ :drav-raetangia (- right la ft 1) (- bottom top 1) 

(la laft) (la top) tv;alu-*ndca> ) 

(sand aalf :updata-stata-and-haight-list ) ;thia should ba changad to saftar for 

; maintanca saka ! ! 
t> 

(t t)>)) 

; (da f mat hod (sterad-pattams-pana zaftar zrafrash } () 

; (sand aalf zdraw-grid nil}) 

; (dafflavor bamstain-flavor (stora-pattama-array-and-haigh-list) () 

; saatttabla-inatanca-variablaa) 

(dafflavor input-pattarn-pana (stcre-pattarna-straam 

lpan-box-1 1) 

( pan -box -h 1)) 

(bcx-»ouaa-sanaitive-itana-mixin sanaitiva-pad-mixir. 
tvzgraphics-mixin tvjpana-mixin tv: window) 

: aattabla-instanca-variablaa) 

(da fun-amt hod updato-ona-itam input -pattarn-pana (itam typa) 

(lat ((laft (itam-laft itam)) 

(top (itam-top itam) ) 

(right (itam-right itam) > 

(bottom (itam-bottom itam)) 

(atata (itam-stata itam) ) 
alu) 

(aatf (itam-stata itam) (caaa typa 

( : toggla (and (satq alu tv:alu-xcr) (flip atata))) 

(:draw (and (aatq alu tv:alu-aata) 1) ) 

Caraaa (and (aatq alu tv:alu-ancca) 0)))) 

(sand aalf sdraw-raetangla 

(- right laft 1) (- bottom top 1) (!♦ laft) (1* top) alu))) 

(dafmsthod (input -pattarn-pana : ravar sa-pad) () 

(loop for itam in (sand aalf :itam-list) 
do 

(updata-ona-itam itam ztoggla))) 

(dafmathod (input -pattarn-pana :collact-updata-boxaa) (chi) 

(lat ((row-indax (car cbi)) 

(eol-indax (edr cbi))) 

(sand aalf :find-itama 

(loop for i from row-indax balow (♦ row-indax pan-box-1) 
nconc 

(loop for j from ccl-indax balow (* eol-indax pan-box-h) 
eollact 

(cons i 5)))))) 

(dafmathod (input-pattam-pana :updata-itam) (itam typa) 

(lat ( (currant-row-col-indax (itam-nama itam))) 

(dolls t (itam (sand salf : collact-updata-boxaa currant-row-col-indax}) 

(updata-ona-itam itam typa)))) 

(dafmathod (input-pattam-pana :nort-p*tt«m) () 

(lat ( (*p (sand aalf : atora-pattama-atraam) ) 

(p-row (sand aalf : row) ) 

(p-cel (sand aalf :eol)} 

(pattam-array (sand aalf :maka-ita»-stata-array) ) 
atorad-pad-itam laft top) 

(aatq atorad-pad-itam (loop for i in (ravaraa (sand ap :ita=?-liat) ) 

tharaia (and (nuabarp (itam-stata i) ) i) ) ) 

(aatq laft (itam-laft atorad-pad-itam) ) 

(aatq top (itam-top atorad-pad-i tam) } 

(aatf (itam-stata atorad-pad-itam) pattarn-array) 

(aatf (itam-nama atorad-pad-itam) 3) ;dafault haight : 

(draw-pattarn p-row p-col pattarn-array sp 

(list (- (itam-right aterad-pac-itam) laft) 

(- (itam-bottom atorad-pad-itam) top) ) 
laft top) 

(sand ap :drav-grid nil nil))) 

(dafmathod (input-pattara— pana :aftar ratore-pattarn) () 

(lat ( (ap (sand Mlf :stora-pattama-atraam# ) ) 

(sand ap zupdata-stata-and-haight-liat) ) ) 


(dafmathod (input-pactarn-pana zmousa-cliek) (button 


x y> 
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(let ((Item (aend aelf :aou*tM«n*itlvt-it«B * yl)) 

(cond ({and item <«ql button #\a»uae-L-l) ) 

(update-one- item item stoggle) 
t) 

((eql button #\mouae-L-2) 

(when (and row col) 

(aend aelf sdraw-grid nil) 

(aend aelf sreaet-atate) 
t) ) 

({eql button l\c-»ouae-L-l) 

<a«nd aclf : store-pattern) 
t) 

({eql button #\m-mouae-L-l) 

♦ ; (proce a a -run- function ”Run Beratein" 

::i* (lambda () 

(let { (ap (send aelf : atere-pattema-atreatn) ) 

(op (aend (aend aelf sauperior) sget-pane ' output -pattern) ) 

(liap (aend (aend aelf :auperior) sget-pane 'liap))} 

(aend liap : dear-window) 

(aend op : el ear -window) 

(draw-pattern row col 

(top-level (aend aelf smake-itam-atate-array) 

(aend ap. :atate-liat) (aend ap sheight-liat ) 
liap) 

ep) ) ) 

Ueql button #\auper-mouae-l-l) 

;; (process-run-funetion "Run Beratein” 

(lambda () 

(let ((ap (aend aelf : atore-pattemi-atream) ) 

(op (aend (aend aelf sauperior) sget-pane ' output -pattern) ) 

(liap (aend (aend aelf sauperior) sget-pane 'liap))) 

(aend liap : clear -window) 

(aend op sclear-window) 

(draw-pattern row col 

(qarya-top-level (aend aelf smake-lten-acate-array) 
(aend ap sqarya-atate-liat) 
liap) 

«p) ) ) 

,-;)) 

(t t)))) 

(defwhopper (ir.put-pattem-pane : mouae-movea) (x y) 

(let ((item (aend aelf :»cuae-eeniitive-item * y) ) 

(button (tvrmouae-buttona) ) ) 

(cond ((and iter, (member button '(2 4))) 

(and (» button 2) (update-one-itere item sdraw)) 

(and (» button 4) (update-one-ltam item reraae)) 
t) 

(t nil))) 

(continue-whopper x y) ) 

(def flavor output-pattem-pane () 

(tvspane-mixin tvswindow) ) 

(defflavor liarp-pane () 

(tvsliap-liatener-pane tvswindow) ) 

(defflavor interface () 

(tvsbordera-mixin tv:bordered-conatraint-frame-with-ahared-io-buf fer) 

: se t table- inatance-variablea 
< :defauit-init-pli at 
spanas 

* ( (atored-pattema atored-patterna-pane 

: label , (xlsatring -Stored Patterns”) 

:bl inker-p nil 
saave-bit* t) 

(input-pattern input-pactem-pane 

: label , (xlsatring "Input Pad”) 
sblinker— p nil 
saave-bita t) 

(output-pattern output-pattem-pane 

: label , (xlsatrinq "Output Diaplay") 
sblinker-p nil 
taave-bita t) 

(liap liap -pane) ) 
sconfigurationa 
•((main (: layout 

(main scclumn atored-pattema twiddle liap) 

(middle : row input-pattern output-pattern)) 

(saixes 

(main (atored-pattema 0.50} 
sthen (middle 0.50) 
sthen (liap seven)) 

(middle (input-pattern :0.i) 

sthen (output-pattern seven) ) ) ) ) 

: configuration 'main)) 

(defmetbod (interface safter sinit) (treat ignore) 

(let ((ap (aend aelf sget-pane ' atored-pattema) ) 

(ip (aend aelf sget-pane 'input-pattern))) 

(aend ap :aet-input-pattem-atream ip) 

(aend ip saet-atore-pattema-atream ap) ) ) 
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(aetq foo (tv:make-vindov ' interface :blinker-p nil :edgea-fro* :mouse)) 

<setq bar (tv: make-window 'interface :blinker-p nil :edgea-fzoe :mui«) } 

(defvar *atore-4rray-liat* nil) 

(defvar *stcre-height-liat* nil) 

(defvar "pattem-rov-col* nil) 

(dcfun save (file window-frame ) 

(let ( (ap (send window- frame : get -pane ' atored-pattema) ) 

(ip (send window-frame :get-pane * input -p4tt«m) ) } 

(ayf :dump-forms-te-file (f a : parse-pathname file) 

* ( (Mtq *store-array-list* * , (send ap : state-list ) ) 
(aetg "store-height-list* ' , (send jp :height-listj ) 
(aetq *pactem-row-col* ',(eona (send ip :row) 

(send ip :cel) )))))) 


(defun retrieve (file window-frame) 

(let ( <sp (send window- frame : gat -pan* * atorad-pattarna) J 
(ip (send vindow-fraa* :gat-pan * ' input-pattern) ) ) 

(whan (y-or-n-p *Has the Store Pattern area been aatup? “) 

(load (fa : parse-pathname file)) 

(aand ip : *et -row (car *pattam-row-ccl*) ) 

(aand ip :a«t-col (edr *pattem-row-col*} ) 

(aand ip : draw-grid) 

(loop for p in *atore-array-list* 
for h in *atora-height-liat» 
for pa in (ravaraa (aand ap : item-list)) 
for left • {item-laft pa) 
for top • (item-top pa) 
do 

(aotf (item-state pa) p) 

(aatf (item-name pa) h) 

(draw-pattern (car *p4ttern-row-col*) (edr *pattem-row-cel*) p ap 
(Hat (- (item-right pa) left) 

(- (item-bottom pa) top)) 
left top) ) 

(aand ap :draw-g-id nil nil) 

(aand ap : aet-atate-li at *atore-array-liat*) 

(aand ap : aet -garys-state-li at 

(loop for a in (aand ap :atata-liat) 
collect 

(convert-to-one a}}) 

(aand ap : aet-height-li at • atore-height -list* ) ) ) ) 


(da fun tea () 

(cl: time 

(loop for i from 0 to 1000 do 
(+ 1 D) 

)) 

-*- Mode: LISP; Syntax: Common-liap; Package: CS£R; fiaae: 10 -»- 


(defun make-q-array (length initial -contents) 

(make-array length : element-type ' (unaigned-byte 1) :initial-con * initial-contents 
: fill-pointer t) ) 

(def macro cJ eaeneaa-ccunt (pattern-length g at ore-vectora-liat ) 

'(loop for store-vector in , at ore-vactora-liat 
collect 

(let ((a store-vector)) 

(declare (ays : array-register a)) 

(loop for i from 0 below , pattern-length 
count (eg (bit ,g i) (bit a i) ) ) ) )) 

(defun aum-lat-and-2nd-terma (pattern-length cloaeneaa-liat disturb- fact or store-beight-liat) 
pat t e rn- 1 e ngrt h 

(loop for i in cloaeneaa-liat 

for j in atore-height-liat 
collect 

;; (if <* -dttern- length i) nil 
(♦ {* i uiaturb-factor) j) 

.*;) 

)) 

(defmacrc sum-third-tera-aux (sum-value g b) 

'(values , b ;b is 1 then it's positive 

(if (■ (logxor , q ,b) 1) (* , sum-value 3) , sum-value) ) ) 

(cef macro flip (x) 

* (eend ( (» ,x 0) 1) 

Ct 0) ) ) 

(dofun add-bita (on-bita-liat on-bit) 

(loop for a*em-liat • (member on-bit on-bita-liat) 

until (and (null a*em-list) (push on-bit on-bita-liat) (return on-bits-listl ) 
do 
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(satq ©n-bit*-Iist (ramova on-bit on-bits-iist > ) 
(satq on-bit (1* on-bit 1 ) > ) 


28 


(dafun d-indax-nav (q-valua storad-vacters-list sum-valua-liat disi-indax) 

; ; (option*! (window ppj ) 


(lot ( (pos-aum nil) 

(nag-sum nil) 
axact-match) 

(satq exact-match 

(loop for b in storad-veetort-list 

for b-valu« • (bit b dim-index) 
for s-value in sum-valua-list 
do 


(if (null i*v*lut) 

(return bl 

(sjultipla-valua-bind (bucket vsl23) 

(aum-third-term-aux s-value q-value fa-value) 

(cut bucko t 

(1 (satq pos-sun (add-bits pos-sure val23))) 

(0 (i«tQ m;-iu» (add-bits nag-sum v*123 )}))))) ) 

:: (print exact-mateh 11) 

;;(if exact-swatch 
;;«xact -match 

(loop for max -pcs • (if (null'pos-sum) -1 (apply #'nax pos-aum)) 
for swax-neg - (if (null nag-sum) -1 (apply f'max nag-sum)) 
until (or (and (• -1 max-pos max-nag) (raturn nil)) 

(and (m siax-pcs swax-nsg) 

(if (> max-poa max-nag) (raturn 1) (raturn 0)))). 
do 

(satq pos-aum (dalata swax-pos pos-aum) ) 

(satq nag-sum (dalata majc-nag nag-sum) ) ) 

;;) 

)) 


(dafun d -dimansions (pattarn-lar.gth quary-array-vactor storad-vactor-list 

disturb-factor storad-haight-list rasult-array 
4 optional (procass-indax-list nil)) 

(1st Mr rasult-array) 

(q quary-array-vactor) 
s-1-2) 

(daclara (sys: array-register r q) ) 

(satq s-1-2 (sum-laf and-2nd-terma pattern-length 

( cl e sanaa a-count pattam-langth q storad-vactor-list ) 
disturb-factor storad-haight-list) ) 

;; (print s-1-2 11) 

(if procass-indax-list 

(loop for i in procass-indax-list 

for pra-bit-valua - (bit r i) 
for qbit-valua * (bit q i) 

for d-valoa • (d-indax-naw qbit-valua storad-vactor-list s-1-2 i) 
until (and (typap d-valua 'array) (raturn d-valua}) 
do v 

; : (braak "in procass-indax-list") 

(format 11 d-valua • -D" d-valua) 

(if (- (logxor pra-bit-valua 
d-valua) 

1) 

(satf (bit r i) ••) ) ) 

(satq procass-indax-list 

(loop for i from 0 balow pattam-langth 
for pra-bit-valua » (bit r i) 
for qbit-valua - (bit q i) 

for d-valua » (d-indax-naw qbit-valua storad-vactor-list s-1-2 i) 

; ; dc (format t "-% d-valua * -0" d-valua) 

until (and (typap d-valua 'array) (raturn d-valua) ) 

ncone 

(whan (- (logxor pra-bit-valua d-valua) 

1 ) 

(satf (bit r i) (flip pra-bit-valua)) 

(list mm 

(valuas r procass-indax-list ) )) 


(cafun top-laval (quary-array-vactor storad-vactor-list storad-haight-list 

4optional .(window t) ) 

(lat ( (pactarn-langtb (array-total-sise quary-array-vactor)) 
rasult-array 
procass-indax-list) 

(satq rasult-array (maka-array pattam-langth )) 

(copy-array-contants quary-array-vactor rasult-array) 

(format windoW-% First iteration!!") 

(muitipla-valua-satq (rasult-array procass-indax-list) 

(d-dimansions pattarn-langth quary-array-vactor storad-vactor-list 5 
storad-haight-list rasult-array)) 

(whan (and procass-indax-list (listp procass-indax-list) ) 

(format window •-% Second iteration! ! ") 

(format window •-% procass-indax-list • -S* procass-indax-list) 
(d-dimansions pattarn-langth rasult-array storad-vactor-list 3 

storad-haight-list rasult-array procass-indax-list) ) 


rasult-srray) ) 
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HQ AFESC/DEC 


PREPARED BY: 

DBA REPORT 

DATE: 07/27/ 

PROGRAM ID: 

AFLC 

PROJECT ID: ROBIN 


FACILITY 10: .-15 

RUN NUMBER: 

01 

KBasnsam 

SET NUMBER: 01 

COSTS CALCULATED ARE: 

ifftBMiuttiamcvtBnittnsi 

CONSTANT $ 

LCC RUN NUMBER: 06 


YEARLY CONSTANT $ ENERGY l CLEANING VALUES 


DESCRIPTION 

COST 

QTY 

ENERGY TYPE 

CLEANING -*> 

1310 


HEATING **> 

13026 

304 

NAT GAS 

A/C -*> 

14 

114 

ELECTRIC 

FN$/LGHT$«> 
USER DEF1 ==> 
USER DEF2**> 
USER DEF3«> 
USER 0EF4**> 

16 

130 

ELECTRIC 



DELETE ESTIMATE DATA 


Initial menu item "8” is selected to delete estimate data. CCMAS 
tells a user how data may be deleted, then asks for the CCMAS-ID. 

DATA CAN BE DELETED BY ENTERING: 

CCMAS-ID; CCMAS-ID AND RUN #; OR CCMAS-ID, RUN# AND SET#: 
ENTER PROGRAM, PROJECT, FACILITY- ID (CCMAS-ID) : 

ENTER RUN NUMBER: 


If the user inputs a <CR> instead of a run number CCMAS responds: 

DO YOU WANT TO DELETE ALL ESTIMATE DATA FOR: 

CCMAS-ID: XXXXXXXXXX 


If the user inputs a run number, CCMAS responds: 
ENTER SET NUMBER: 


If the user inputs a <CR> instead of a set number CCMAS responds: 

DO YOU WANT TO DELETE ALL ESTIMATE DATA FOR: 

CCMAS-ID: XXXXXXXXXX 
RUN NUMBER : X 


If the user enter a set number CCMAS responds: 

DO YOU WANT TO DELETE ALL ESTIMATE DATA FOR: 
CCMAS-ID: XXXXXXXXXX 
RUN NUMBER : X 

SET NUMBER: X 


A "No" response to the DO YOU WANT TO DELETE ALL ESTIMATE DATA 
FOR: returns the user to the previous data input. To a "YES" 
reply , CCMAS responds: 

DATA WILL BE DELETED 
DELETING ESTIMATE DATA FOR: 

CCMAS-ID: XXXXXXXXXX 

RUN NUMBER: X (If Specified) 

SET NUMBER: X (If Specified) 

DATA DELETED 

The user is then returned to the initial menu. 
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What is claimed is: 

1. A method of comparing, with the aid of a comput- 
ing system, a query pattern with a set of stored patterns, 
said method comprising the steps of: 

a) creating a library of stored patterns in a desired 5 
format wherein each pattern comprises a set of 
elements, each pattern having a relative time- 
dependent importance/avoidance property; 

b) presenting a query pattern comprising a set of 
elements representative of the entity to be matched 10 
in the same size and format as the stored patterns; 

c) comparing the query pattern with each of the 
stored patterns, on an element-by-element basis and 
determining a first degree of match for each stored 
pattern; 

d) indicating a complete match if one exists; 

e) creating, if no complete match exists, a derived 
query pattern having the same number of elements 

as the original query pattern and the stored pat- 2Q 
terns, said derived query pattern being created as 
follows: 

1) determining a set of first change numbers D 
according to the following formula: 

25 

DiAM: X: B\... ,**) = cU,r)pff ( U0 [pM* D] S\(X,i) + 

C(2, x\P"M [I*** 2)] S2{Xi) + . . . + C(Kt)pWKt) [pU{X t k)] 

30 

where: 

Di /is the first change number for the x th element 
of the query pattern, 

t indicates a function of time, 35 

C(i,t) is the algebraic sign of the relative impor- 
tance property at time t of stored pattern B', 
ph(i,t) i s the magnitude of the relative impor- 
tance property of stored pattern B' at time t, 
J(X,i) is the degree of match with stored pattern 40 
B', 

(S*(X,i) is: 

— 1 if thei th element of B 2 and the \ th element of 
X are both 0; 

1 if the \ th element of B 2 and the x th element of 45 
X are both 1; 

— p 3 if the \ th element of B 2 is 0 and the \ th 
element of X is 1; 

p 3 if the \ th element of B 2 is 1 and the \ th element 
of X is 0, 50 

2) setting the value of the x th element of the derived 
query pattern at 1 if the value of the x th element of 
the query pattern is 1 and the first change num- 
ber for the X th element is positive; 

3) setting the value of the \ th element of the derived 55 
query pattern at 1 if the value of the inclement of 
the query pattern is 1 and the first change num- 
ber for the x th element is zero; 

4) setting the value of the x th element of the derived 
query pattern at 0 if the value of the x th element of 60 
the query pattern is 1 and the first change num- 
ber for the x th element is negative; 

5) setting the value of the x th element of the derived 
query pattern at 1 if the value of the I th element of 6$ 
the query pattern is 0 and the first change num- 
ber for the x th element is positive; 
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6) setting the value of the \ th element of the derived 
query pattern at 0 if the value of the i th element of 
the query pattern is 0 and the first change num- 
ber for the x th element is zero; 

7) setting the value of the \ th element of the derived 
query pattern at 0 if the value of the x th element of 
the query pattern is 0 and the first change num- 
ber for the \ th element is negative; 

f) comparing the derived query pattern with each of 
the stored patterns, on an element by element basis 
and determining a second degree of match; 

g) indicating an answer pattern, said answer pattern 
being the derived query pattern if a complete 
match exists between the derived query pattern 
and a stored pattern, 

h) creating, if no complete match exists, an answer 
pattern having the same number of elements as the 
derived query pattern and the stored patterns, said 
answer pattern being created as follows: 

1) determining a set of second change numbers D 2 
according to the following formula: 


A": B ] B *) = 5i(X,0 4 - 

Of2, t )P H M [pL’AX,iy] s 2 (X,i) + . . . + 

ctbOpHM [/*'**.*)} s*< jr,i) 


where: 

D 2 / is the second change number for the x th ele- 
ment of the query pattern, 
t indicates a function of time, 

C(i,t) is the algebraic sign of the relative impor- 
tance property (or zero) of the stored pattern 
B ; at time t, 

pW.Ois the magnitude of the relative importance 
property of stored pattern B J , 

J(X',i) is the second degree of match B'and X, 
S^X',1) is: 

— 1 if the element of B 2 , and the \ th element of 
X' are both 0; 

1 if the i* A element of B 2 and the x th element of 
X 1 are both 1; 

— P 3 if the \ th element of B 2 is 0 and the x th 
element of X' is 1; P 3 if the x th element of B 2 
is 1 and the x th element of X' is 0, 

2) setting the value of the x th element of the answer 
pattern at 1 if the value of the x th element of the 
query pattern is 0 and both the first change num- 
ber and the second change number for the \ th 
element are positive; 

3) setting the value of the x th element of the answer 
pattern at 0 if the value of the \ th element of the 
query pattern is 1 and both the first change num- 
ber and the second change number for the x th 
element are negative; 

4) setting the value of the x th element of the answer 
pattern at 0 if the value of the x th element of the 
query pattern is 0 and the first change number 
for the x th element is negative; 
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5) setting the value of the \ th element of the answer 
pattern at 1 if the value of the i rh element of the 
query is 1 and the first change number is positive; 

6) setting the value of the \ lh element of the answer 
pattern at *, where * indicates ambiguity, if the 5 
value of the \ th element of the query pattern is 0, 
the first change number for the \ th element is 
positive and the second change number is nega- 
tive; and 

setting the value of the i th element of the answer 10 
pattern at * if the value of the \ th element of the 
query pattern is 1, the first change number is 
negative and the second change number for the 
\ th element is positive; and 

i) converting answer pattern from representational 15 
format to desired format with ambiguous elements 
distinguished from determined elements in some 
manner. 

2. A method, using a computing system, for calculat- 
ing the similarity between a first pattern, called a “query 20 
pattern”, and at least one of a library of k second pat- 
terns, called “stored patterns, ” the query pattern being 
representative of a physical entity and being repre- 
sented by a first sequence of successive feature elements 
X=(X i, X 2 , . . . » X/, . . . , X„) where n equals the number 25 
of feature elements, each stored pattern being represen- 
tative of a physical entity and being represented by a 
second sequence of successive feature elements B=(Bi, 

B 2 , • . . , Bi, . . . B n ), the method comprising the steps of: 

(a) comparing the query pattern with the m th stored 30 
pattern on an element by element basis; 

(b) counting as a “first degree of match” for the m 1 * 

stored pattern, the number of elements of the query 
pattern which are equal to the corresponding ele- 
ment of the m th stored pattern; 35 

(c) outputting a “matched pattern” indication if the 
first degree of match for the m lh stored pattern is 
equal of n; 

(d) storing the count for the first degree of match for 

the m th stored pattern if less than n; 40 

(e) repeating steps (a) through (d) for each remaining 
stored pattern; 

(f) computing, using the query pattern and the first 
degree of match, a first set of n change numbers for 
the set of stored patterns according to the follow- 
ing equation; 

X:B l #) = a 1-0 P HiU) + . . . + 

dU) PWv) [pLAX t i)] s 2 {X,i) + . . . + 50 

a*,*) Sktx.i) 

where: 

(1) Dj /is the first change number for the i^ element 55 
of the query pattern; 

(2) P is a positive prime number; 

(3) L and L' are integers such that (L>L'> 1); 

(4) t indicates a function of time; 

(5) C(i,t) is the algebraic sign of the relative impor-.60 
tance property of stored pattern B', 

(6) pH&O is the magnitude of the relative impor- 
tance property of stored pattern B*; 

(7) J(X,i) is the degree of match with stored pattern 

B'; 65 

(8) Sz(X,i) is: 

— 1 if the element of B 2 and the i th element of X 
are both 0; 
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1 if the \ th element of B 2 and the i th element of X 
are both 1; 

— p 3 if the \ th element of B 7 is 0 and the \ th element 
of X is 1; and 

p 3 if the \ lh element of B 2 is 1 and the \ th element 
of X is 0; 

(g) computing, using the query pattern X and the first 
et of change numbers, a derived query pattern X' 
where X'=(X'i, X' 2 . . . , X'/, ...» X'*); 

(h) comparing the derived query pattern to the m fA 
stored pattern on an element by element basis; 

(i) counting as a “second degree of match” for the 
m th stored pattern, the number of elements of the 
derived query pattern which are equal to the corre- 
sponding element of the m th stored pattern; 

(j) outputting a “matched pattern” indication if the 
second degree of match for the m th stored pattern is 
equal to n; 

(k) storing the count for the second degree of match 
for the m th stored pattern if less than n; 

(l) repeating steps (h) through (k) for each remaining 
stored pattern; 

(m) computing a second set of n change numbers for 
the set of stored patterns using the query pattern 
and the second degree of match; 

(n) computing an “answer pattern” using the query 
pattern, the first set of change numbers and the 
second set of change numbers. 

3. The method of claim 2, further comprising the 
further step of computing the second set of n change 
numbers according to the follow equation: 

DlM-X: B\ . . . ,5*) = GCU0 P HiU) [/^ r ’ l >3 Si(X,i) + . . . + 
CU0 PHW [/*'*«] S 2 (X,i) + . . . + 

a k,t) pm*) [pWX,k ) j 5*0”, 0 

where: 

(1) D 2 / is the second change number for the \ th ele- 
ment of the query pattern; 

(2) t indicates a function of time; 

(3) C(i,t) is the algebraic sign of the relative impor- 
tance property (or zero); 

(4) is the magnitude of the relative importance 
property; 

(5) J(X',i) is the second degree of match (the number 
of elements of B that agree with the corresponding 
element of X'; 

(6) SiCX' f i) is: 

— 1 if the element of B and the \ th element of X' are 
both 0; 

1 if the \ th element of B and the \ th element of X' are 
both 1; 

— p 3 if the \ th element of B is 0 and the \ th element of 
X' is 1; and 

p 3 i the x th element of B is 1 and the \ th element of X' 
is 0. 

4 . A method of matching a first query pattern, taking 
the form of a set X=xa with a plurality of stored data 
patterns, taking the form of a matrix B=b^, where 
i= 1, . . . , n is the number of components in each pattern 
and j= 1, . . . , k is the number of stored data patterns, 
said method comprising the steps of: 

(a) for each stored data pattern, counting the number 
of components which are identical to correspond- 
ing components in said first query pattern, thereby 
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forming a set of match numbers M=my 2 where 
j = l, . . . , k; 

(b) if any match number my=n, then displaying the 

respective j th stored data pattern an an output pat- 
tern set Oy—Oy indicating a match; 5 

(c) if no match number m y — n, then determining a 

second query pattern X'=x/ by modifying said 
first query pattern, component by component, in 
dependence upon both a first, global influence of . 
all stored patterns on all components of said first 1 
query pattern and a second, particular influence of 
all stored patterns on each respective component of 
said first query pattern, wherein such step further 
comprises the steps: 15 

(1) multiplying each match number my of a match 
set M by a first disturbance factor L to produce 
a set LM; 

(2) determining a sign matrix Sgn for all compo- 
nents sgn ; y by setting each component equal to 20 
— 1 if the corresponding stored pattern compo- 
nent by is 0, and to + 1 if the stored pattern com- 
ponent is 1; 

(3) determining a magnitude matrix Mag for all 
components according to the formula magy = [- 25 
(logxor(by,x/)=l), where N is a magnification 
factor; 

(4) determining an exponent matrix Exp = LM+- 
Mag for all components according to the for- 
mula expy— Lmy-f magy, 

(5) forming the positive and negative sums for all 
components as follows: 

Pos.sum/=P(exp/,i)-K . . + P(exp/,*) for each 
(exp/,*) of j where sgn;y>0, 35 

_ Neg.sum,-=P(exp J ;i)-K . . -f-P(exp/,*) for each 
(exp/,*) of j where sgn/y<0; 

(6) determining a second query pattern set X'=x/ 
for all i as follows: 

if Pos.sum/^Neg.sum/, then x/=l, 40 

else x/=0; 

(d) repeating steps (a) and (b) using said second query 
pattern in place of said first query pattern; 

(e) if no match number my— n, then determining a 
third query pattern X"=x/' by modifying said 45 
second query pattern, component by component, 

in dependence upon both a third, global influence 
of all stored patterns on all components of said 
second query pattern and a fourth, particular influ- 
ence of all stored patterns on each respective com- 50 
ponent of said second query pattern, said third and 
fourth influences being less than said first and sec- 
ond influences, respectively; and 

(f) displaying as said output pattern 0-32 o /, compo- 55 
nent by component, those respective components 
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of said third query pattern that have been modified 
at most once from said first query pattern. 

5. The method defined in claim 4, further comprising 
the step of determining a response set R=r/for all i as 
follows: 

r,—Xp if x{— jc it and 
n= set flag, if Xj=Xj. 

6. The method defined in claim 5, wherein step (e) 
includes the steps (1) through (6), using a second distur- 
bance factor L' which is less than said first disturbance 
factor L, for those components i that have a set flag. 

7. The method defined in claim 4, wherein a height 
factor set H=hyis associated with the components of 
each stored pattern by, each height factor component hy 
being indicative of the relative importance of each 
stored pattern with respect to the other stored patterns, 
and wherein said height factor set H is added to the set 
LM for purposes of determining the matrix Exp. 

8. The method defined in claim 7, wherein at least 
some of said height factor components hyare a function 
of time. 

9. The method defined in claim 7, wherein each of 
said height factor components hy is an integer. 

10. The method defined in claim 4, wherein a sign 
factor set C=cy is associated with the components of 
each stored pattern by, each sign factor component cy 
being indicative of whether the pattern component is to 
be sought, avoided or ignored, and wherein said sign 
factor set C is multiplied by the sign matrix Sgn for the 
purposes of determining the positive and negative sums. 

11. The method defined in claim 10, wherein at least 
some of said sign factor components cyare a function of 
time. 

12. The method defined in claim 10, wherein each of 
said sign factor components cy is an integer. 

13. The method defined in claim 10, wherein each of 
said sign factor components Cjassumes one of the values 
-{-1, 0 and — 1. 

14. The method defined in claim 4, wherein said first 
disturbance factor L is in the range of 2 to 20. 

15. The method defined in claim 4, wherein said first 
disturbance factor L is in the range of 3 to 7. 

16. The method defined in claim 4, wherein said first 
disturbance factor L is 3. 

17. The method defined in claim 16, wherein said 
second disturbance factor L' is 2. 

18. The method defined in claim 4, wherein said mag- 
nification factor N is in the range of 2 to 20. 

19. The method defined in claim 4, wherein said mag- 
nification factor N is in the range of 3 to 7. 

20. The method defined in claim 4, wherein said mag- 
nification factor N is 3. 

***** 
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